home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Format CD 35
/
Amiga Format AFCD35 (Issue 119, Jan 1999).iso
/
-in_the_mag-
/
reader_requests
/
except
/
testnull.a
< prev
next >
Wrap
Text File
|
1998-11-06
|
856b
|
27 lines
*********************************************************************************
* *
* TestNull -- Test program for forcing out a division by zero exception *
* *
* $VER: TestNull.a 37.1 (12.8.92) -- Exception #5 handler test example *
* *
* Copyright (C) 1992 Compos Mentis Software Systems -- Jesper Kehlet *
* *
*********************************************************************************
include 'dos/dos.i'
section TestNull,code
*********************************************************************************
* *
* This is the main stuff -- the nasty exception provocateur *
* *
*********************************************************************************
moveq #0,d0 ; Denominator must be zero
divu d0,d1 ; Trap it...
rts ; If we get here, it's OK
end